Wound evolution
rgl graphic
plyLoadR similar graphic
Show the code
# Load the same ply files, now via the plyLoadR library
library(plyLoadR)
plyLoadR(
paths = paste0(Mainpath, "/", patient1_FolderViews),
localFiles = TRUE,
elementId = "plyLoadRGraphic1",
isTransparent = TRUE,
opacity = list(0.4, 0.6),
isWireframe = FALSE
)plyLoadR: Mesh evolution
Show the code
# Load ply files with 'aligned' geometries
plyLoadR(
paths = paste0(Mainpath, "/", patient0_FolderViews),
localFiles = TRUE,
elementId = "plyLoadRGraphic2",
isTransparent = TRUE,
opacity = 0.5,
camera = list(position = list(30, 0, 25)),
toggleWidgets = TRUE,
toggleLabels = c("2020-07-09", "2020-07-17", "2020-07-24")
)